From 9d840bec3e0a2ddac938870694b4cdc30e6014e1 Mon Sep 17 00:00:00 2001 From: "Richard M. Stallman" Date: Mon, 20 Jun 1994 01:52:51 +0000 Subject: [PATCH] (tab-to-tab-stop): Combine new indentation with previous. --- lisp/indent.el | 5 ++++- 1 file changed, 4 insertions(+), 1 deletion(-) diff --git a/lisp/indent.el b/lisp/indent.el index e7f4605b682..17e58241fd1 100644 --- a/lisp/indent.el +++ b/lisp/indent.el @@ -238,7 +238,10 @@ Use \\[edit-tab-stops] to edit them interactively." (while (and tabs (>= (current-column) (car tabs))) (setq tabs (cdr tabs))) (if tabs - (indent-to (car tabs)) + (let ((opoint (point))) + (skip-chars-backward " \t") + (delete-region (point) opoint) + (indent-to (car tabs))) (insert ?\ )))) (defun move-to-tab-stop () -- 2.30.2